home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / program / 316 / libsrc / strchr.c < prev    next >
Encoding:
Text File  |  1988-10-20  |  395 b   |  23 lines
  1. /*
  2.  *        Cross Development System for Atari ST 
  3.  *     Copyright (c) 1988, Memorial University of Newfoundland
  4.  *
  5.  * $Header: strchr.c,v 1.1 88/01/29 17:33:54 m68k Exp $
  6.  *
  7.  * $Log:    strchr.c,v $
  8.  * Revision 1.1  88/01/29  17:33:54  m68k
  9.  * Initial revision
  10.  * 
  11.  */
  12. char    *
  13. strchr(s, c)
  14.     char    *s;
  15.     char    c;
  16. {
  17.     do
  18.         if (*s == c)
  19.             return s;
  20.     while (*s++);
  21.     return (char *) 0;
  22. }
  23.